home *** CD-ROM | disk | FTP | other *** search
/ Just Call Me Internet / Just Call Me Internet.iso / com / computer / casio_st / prog_fx / oisac2 / input$1.txt < prev    next >
Text File  |  1994-03-01  |  210b  |  8 lines
  1. 10 '*** OISAC 2 *** INPUT$1 ***
  2. 20 CLS:INPUT"Nombre :",A:PRINT"[1]:SIN  [2]:COS  [3]:TAN"TAB(0);
  3. 30 ON VAL(INPUT$(1)) GOSUB 50,60,70
  4. 40 PRINT B:GOTO 20
  5. 50 B=SINA:RETURN
  6. 60 B=COSA:RETURN
  7. 70 B=TANA:RETURN
  8.